MacTech 1 to 12

home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / develop™ Technical Journal / develop Issue 12 code / Components.sea / Components / Sources / MoMathComponent.c < prev next >
MacBinary | 1994-12-12 | 8.0 KB | [TEXT/MMCC]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Sun Dec 11 23:35:13 1994, modified Sun Dec 11 23:35:13 1994, creator 'MMCC', type ASCII, 7528 bytes "MoMathComponent.c" , at 0x1de8 410 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MMCC]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 11 4d 6f 4d 61 74 68 | 43 6f 6d 70 6f 6e 65 6e |..MoMath|Componen|
|00000010| 74 2e 63 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |t.c.....|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 4d 43 | 43 01 00 00 00 00 00 00 |.TEXTMMC|C.......|
|00000050| 00 00 00 00 00 1d 68 00 | 00 01 9a ab 11 83 81 ab |......h.|........|
|00000060| 11 83 81 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 a7 f4 00 00 |........|........|
|00000080| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2a 2a 2a 2a 0d 0d 09 | 46 69 6c 65 3a 09 09 4d |*****...|File:..M|
|000000e0| 6f 4d 61 74 68 43 6f 6d | 70 6f 6e 65 6e 74 2e 63 |oMathCom|ponent.c|
|000000f0| 0d 0d 09 43 6f 6e 74 61 | 69 6e 73 3a 09 45 78 74 |...Conta|ins:.Ext|
|00000100| 65 6e 64 65 64 20 6d 61 | 74 68 20 63 6f 6d 70 6f |ended ma|th compo|
|00000110| 6e 65 6e 74 20 72 6f 75 | 74 69 6e 65 73 2e 0d 0d |nent rou|tines...|
|00000120| 09 57 72 69 74 74 65 6e | 20 62 79 3a 09 47 61 72 |.Written| by:.Gar|
|00000130| 79 20 57 6f 6f 64 63 6f | 63 6b 0d 0d 09 43 6f 70 |y Woodco|ck...Cop|
|00000140| 79 72 69 67 68 74 3a 09 | a9 20 31 39 39 32 20 62 |yright:.|. 1992 b|
|00000150| 79 20 41 70 70 6c 65 20 | 43 6f 6d 70 75 74 65 72 |y Apple |Computer|
|00000160| 2c 20 49 6e 63 2e 0d 0d | 09 43 68 61 6e 67 65 20 |, Inc...|.Change |
|00000170| 48 69 73 74 6f 72 79 20 | 28 6d 6f 73 74 20 72 65 |History |(most re|
|00000180| 63 65 6e 74 20 66 69 72 | 73 74 29 3a 0d 0d 09 09 |cent fir|st):....|
|00000190| 09 0d 09 50 72 6f 6a 65 | 63 74 20 73 65 74 74 69 |...Proje|ct setti|
|000001a0| 6e 67 73 20 66 6f 72 20 | 36 38 4b 0d 09 09 43 6f |ngs for |68K...Co|
|000001b0| 64 65 20 6d 6f 64 65 6c | 3a 20 09 09 09 09 53 6d |de model|: ....Sm|
|000001c0| 61 6c 6c 2c 20 53 6d 61 | 72 74 20 6f 72 20 4c 61 |all, Sma|rt or La|
|000001d0| 72 67 65 0d 09 09 4c 69 | 6e 6b 20 53 69 6e 67 6c |rge...Li|nk Singl|
|000001e0| 65 20 53 65 67 6d 65 6e | 74 3a 09 09 6f 6e 20 28 |e Segmen|t:..on (|
|000001f0| 56 45 52 59 20 69 6d 70 | 6f 72 74 61 6e 74 29 0d |VERY imp|ortant).|
|00000200| 09 09 50 72 6f 6a 65 63 | 74 20 74 79 70 65 3a 09 |..Projec|t type:.|
|00000210| 09 09 09 43 6f 64 65 20 | 52 65 73 6f 75 72 63 65 |...Code |Resource|
|00000220| 0d 09 09 46 69 6c 65 20 | 6e 61 6d 65 3a 09 09 09 |...File |name:...|
|00000230| 09 09 4d 6f 4d 61 74 68 | 5f 43 6f 6d 70 6f 6e 65 |..MoMath|_Compone|
|00000240| 6e 74 0d 09 09 53 79 6d | 20 6e 61 6d 65 3a 09 09 |nt...Sym| name:..|
|00000250| 09 09 09 4d 6f 4d 61 74 | 68 5f 43 6f 6d 70 6f 6e |...MoMat|h_Compon|
|00000260| 65 6e 74 2e 53 59 4d 20 | 28 6e 6f 74 20 67 65 6e |ent.SYM |(not gen|
|00000270| 65 72 61 74 65 64 29 0d | 09 09 52 65 73 6f 75 72 |erated).|..Resour|
|00000280| 63 65 20 6e 61 6d 65 3a | 09 09 09 09 45 78 74 65 |ce name:|....Exte|
|00000290| 6e 64 65 64 20 4d 61 74 | 68 20 43 6f 6d 70 6f 6e |nded Mat|h Compon|
|000002a0| 65 6e 74 0d 09 09 48 65 | 61 64 65 72 20 74 79 70 |ent...He|ader typ|
|000002b0| 65 3a 09 09 09 09 53 74 | 61 6e 64 61 72 64 0d 09 |e:....St|andard..|
|000002c0| 09 4d 75 6c 74 69 20 53 | 65 67 6d 65 6e 74 3a 20 |.Multi S|egment: |
|000002d0| 09 09 09 09 6f 6e 20 6f | 72 20 6f 66 66 0d 09 09 |....on o|r off...|
|000002e0| 52 65 73 54 79 70 65 3a | 09 09 09 09 09 5f 36 38 |ResType:|....._68|
|000002f0| 4b 0d 09 09 49 44 3a 09 | 09 09 09 09 09 09 31 33 |K...ID:.|......13|
|00000300| 30 20 0d 09 09 53 65 67 | 54 79 70 65 09 09 09 09 |0 ...Seg|Type....|
|00000310| 09 09 62 6c 61 6e 6b 20 | 28 75 6e 75 73 65 64 20 |..blank |(unused |
|00000320| 73 69 6e 63 65 20 77 65 | 20 61 72 65 20 6c 69 6e |since we| are lin|
|00000330| 6b 69 6e 67 20 73 69 6e | 67 6c 65 20 73 65 67 6d |king sin|gle segm|
|00000340| 65 6e 74 29 0d 09 09 43 | 72 65 61 74 6f 72 3a 09 |ent)...C|reator:.|
|00000350| 09 09 09 09 67 77 63 6b | 0d 09 09 46 69 6c 65 20 |....gwck|...File |
|00000360| 74 79 70 65 3a 09 09 09 | 09 09 74 68 6e 67 0d 09 |type:...|..thng..|
|00000370| 09 52 65 73 6f 75 72 63 | 65 20 66 6c 61 67 73 3a |.Resourc|e flags:|
|00000380| 09 09 09 09 53 79 73 48 | 65 61 70 0d 09 09 50 72 |....SysH|eap...Pr|
|00000390| 6f 6a 65 63 74 20 73 65 | 74 75 70 3a 0d 09 09 09 |oject se|tup:....|
|000003a0| 53 65 67 6d 65 6e 74 20 | 31 20 28 4d 61 69 6e 20 |Segment |1 (Main |
|000003b0| 53 65 67 6d 65 6e 74 29 | 3a 20 4d 6f 4d 61 74 68 |Segment)|: MoMath|
|000003c0| 43 6f 6d 70 6f 6e 65 6e | 74 2e 63 0d 09 09 09 53 |Componen|t.c....S|
|000003d0| 65 67 6d 65 6e 74 20 32 | 20 28 47 72 6f 75 70 32 |egment 2| (Group2|
|000003e0| 29 3a 20 4d 61 63 4f 53 | 2e 6c 69 62 2c 20 46 61 |): MacOS|.lib, Fa|
|000003f0| 74 4d 6f 4d 61 74 68 43 | 6f 6d 70 6f 6e 65 6e 74 |tMoMathC|omponent|
|00000400| 2e 72 73 72 63 20 28 53 | 65 65 20 77 61 72 6e 69 |.rsrc (S|ee warni|
|00000410| 6e 67 20 62 65 6c 6f 77 | 29 0d 09 09 09 53 65 67 |ng below|)....Seg|
|00000420| 6d 65 6e 74 20 33 20 28 | 47 72 6f 75 70 33 29 3a |ment 3 (|Group3):|
|00000430| 20 61 6e 64 20 4d 61 74 | 68 43 6f 6d 70 6f 6e 65 | and Mat|hCompone|
|00000440| 6e 74 43 6f 6d 6d 6f 6e | 2e 63 0d 09 09 09 09 09 |ntCommon|.c......|
|00000450| 09 0d 09 50 72 6f 6a 65 | 63 74 20 73 65 74 74 69 |...Proje|ct setti|
|00000460| 6e 67 73 20 66 6f 72 20 | 50 50 43 20 0d 09 09 50 |ngs for |PPC ...P|
|00000470| 72 6f 6a 65 63 74 20 74 | 79 70 65 3a 09 09 09 09 |roject t|ype:....|
|00000480| 43 6f 64 65 20 52 65 73 | 6f 75 72 63 65 0d 09 09 |Code Res|ource...|
|00000490| 46 69 6c 65 20 6e 61 6d | 65 3a 09 09 09 09 09 4d |File nam|e:.....M|
|000004a0| 6f 4d 61 74 68 5f 43 6f | 6d 70 6f 6e 65 6e 74 0d |oMath_Co|mponent.|
|000004b0| 09 09 53 79 6d 20 6e 61 | 6d 65 3a 09 09 09 09 09 |..Sym na|me:.....|
|000004c0| 4d 6f 4d 61 74 68 5f 43 | 6f 6d 70 6f 6e 65 6e 74 |MoMath_C|omponent|
|000004d0| 2e 53 59 4d 20 28 6e 6f | 74 20 67 65 6e 65 72 61 |.SYM (no|t genera|
|000004e0| 74 65 64 29 0d 09 09 52 | 65 73 6f 75 72 63 65 20 |ted)...R|esource |
|000004f0| 6e 61 6d 65 3a 09 09 09 | 09 45 78 74 65 6e 64 65 |name:...|.Extende|
|00000500| 64 20 4d 61 74 68 20 43 | 6f 6d 70 6f 6e 65 6e 74 |d Math C|omponent|
|00000510| 0d 09 09 48 65 61 64 65 | 72 20 74 79 70 65 3a 09 |...Heade|r type:.|
|00000520| 09 09 09 4e 6f 6e 65 20 | 28 56 45 52 59 20 69 6d |...None |(VERY im|
|00000530| 70 6f 72 74 61 6e 74 29 | 0d 09 09 52 65 73 54 79 |portant)|...ResTy|
|00000540| 70 65 3a 09 09 09 09 09 | 5f 50 50 63 0d 09 09 49 |pe:.....|_PPc...I|
|00000550| 44 3a 09 09 09 09 09 09 | 09 31 33 30 20 0d 09 09 |D:......|.130 ...|
|00000560| 43 72 65 61 74 6f 72 3a | 09 09 09 09 09 67 77 63 |Creator:|.....gwc|
|00000570| 6b 0d 09 09 46 69 6c 65 | 20 74 79 70 65 3a 09 09 |k...File| type:..|
|00000580| 09 09 09 74 68 6e 67 0d | 09 09 52 65 73 6f 75 72 |...thng.|..Resour|
|00000590| 63 65 20 66 6c 61 67 73 | 3a 09 09 09 09 53 79 73 |ce flags|:....Sys|
|000005a0| 48 65 61 70 0d 09 09 4d | 65 72 67 65 20 54 6f 20 |Heap...M|erge To |
|000005b0| 46 69 6c 65 09 09 09 09 | 6f 6e 0d 09 09 45 78 70 |File....|on...Exp|
|000005c0| 61 6e 64 20 55 6e 69 6e | 69 74 69 61 6c 69 7a 65 |and Unin|itialize|
|000005d0| 64 20 44 61 74 61 3a 20 | 09 6f 6e 0d 09 09 4d 61 |d Data: |.on...Ma|
|000005e0| 69 6e 20 45 6e 74 72 79 | 20 50 6f 69 6e 74 09 09 |in Entry| Point..|
|000005f0| 09 4d 61 69 6e 52 44 20 | 28 56 45 52 59 20 69 6d |.MainRD |(VERY im|
|00000600| 70 6f 72 74 61 6e 74 29 | 0d 09 09 50 72 6f 6a 65 |portant)|...Proje|
|00000610| 63 74 20 73 65 74 75 70 | 3a 0d 09 09 09 47 72 6f |ct setup|:....Gro|
|00000620| 75 70 20 31 20 28 4d 61 | 69 6e 20 47 72 6f 75 70 |up 1 (Ma|in Group|
|00000630| 29 3a 20 4d 6f 4d 61 74 | 68 43 6f 6d 70 6f 6e 65 |): MoMat|hCompone|
|00000640| 6e 74 2e 63 0d 09 09 09 | 47 72 6f 75 70 20 32 20 |nt.c....|Group 2 |
|00000650| 28 47 72 6f 75 70 32 29 | 3a 20 49 6e 74 65 72 66 |(Group2)|: Interf|
|00000660| 61 63 65 4c 69 62 2c 20 | 4d 61 74 68 4c 69 62 2c |aceLib, |MathLib,|
|00000670| 20 54 6f 6f 6c 73 4c 69 | 62 2e 6f 0d 09 09 09 47 | ToolsLi|b.o....G|
|00000680| 72 6f 75 70 20 33 20 28 | 47 72 6f 75 70 33 29 3a |roup 3 (|Group3):|
|00000690| 20 4d 61 74 68 43 6f 6d | 70 6f 6e 65 6e 74 43 6f | MathCom|ponentCo|
|000006a0| 6d 6d 6f 6e 2e 63 0d 09 | 09 09 09 09 09 0d 09 2a |mmon.c..|.......*|
|000006b0| 2a 2a 57 61 72 6e 69 6e | 67 2a 2a 2a 20 46 61 74 |**Warnin|g*** Fat|
|000006c0| 4d 6f 4d 61 74 68 43 6f | 6d 70 6f 6e 65 6e 74 2e |MoMathCo|mponent.|
|000006d0| 72 73 72 63 20 68 61 73 | 20 61 6e 20 65 78 74 65 |rsrc has| an exte|
|000006e0| 6e 64 65 64 20 74 68 6e | 67 20 72 65 73 6f 75 72 |nded thn|g resour|
|000006f0| 63 65 20 77 68 69 63 68 | 20 0d 09 69 73 20 73 65 |ce which| ..is se|
|00000700| 74 20 74 6f 20 72 65 71 | 75 69 72 65 20 62 6f 74 |t to req|uire bot|
|00000710| 68 20 50 50 43 20 61 6e | 64 20 36 38 4b 20 63 6f |h PPC an|d 68K co|
|00000720| 64 65 2e 20 20 49 66 20 | 79 6f 75 20 77 61 6e 74 |de.  If |you want|
|00000730| 20 74 6f 20 74 65 73 74 | 20 74 68 65 20 36 38 4b | to test| the 68K|
|00000740| 20 0d 09 63 6f 6d 70 6f | 6e 65 6e 74 20 62 79 20 | ..compo|nent by |
|00000750| 69 74 73 65 6c 66 2c 20 | 75 73 65 20 4d 6f 4d 61 |itself, |use MoMa|
|00000760| 74 68 43 6f 6d 70 6f 6e | 65 6e 74 2e 72 73 72 63 |thCompon|ent.rsrc|
|00000770| 2c 20 69 6e 73 74 65 61 | 64 2e 0d 0d 09 43 57 20 |, instea|d....CW |
|00000780| 63 6f 6d 70 6f 6e 65 6e | 74 73 20 6e 65 65 64 20 |componen|ts need |
|00000790| 74 6f 20 68 61 76 65 20 | 74 68 65 20 4c 69 6e 6b |to have |the Link|
|000007a0| 20 53 69 6e 67 6c 65 20 | 53 65 67 6d 65 6e 74 20 | Single |Segment |
|000007b0| 73 77 69 74 63 68 20 63 | 68 65 63 6b 65 64 2e 20 |switch c|hecked. |
|000007c0| 20 54 68 65 20 4d 75 6c | 74 69 2d 0d 09 73 65 67 | The Mul|ti-..seg|
|000007d0| 6d 65 6e 74 20 73 77 69 | 74 63 68 20 63 61 6e 20 |ment swi|tch can |
|000007e0| 62 65 20 63 68 65 63 6b | 65 64 20 6f 72 20 75 6e |be check|ed or un|
|000007f0| 63 68 65 63 6b 65 64 20 | 61 73 20 66 69 74 73 20 |checked |as fits |
|00000800| 79 6f 75 72 20 6e 65 65 | 64 73 2e 20 20 28 50 6c |your nee|ds.  (Pl|
|00000810| 65 61 73 65 20 0d 09 73 | 65 65 20 74 68 65 20 55 |ease ..s|ee the U|
|00000820| 73 65 72 20 47 75 69 64 | 65 20 66 6f 72 20 77 68 |ser Guid|e for wh|
|00000830| 69 63 68 20 73 69 74 75 | 61 74 69 6f 6e 73 20 72 |ich situ|ations r|
|00000840| 65 71 75 69 72 65 20 74 | 68 65 20 4d 75 6c 74 69 |equire t|he Multi|
|00000850| 2d 73 65 67 6d 65 6e 74 | 20 73 77 69 74 63 68 2e |-segment| switch.|
|00000860| 29 0d 09 50 75 74 74 69 | 6e 67 20 65 76 65 72 79 |)..Putti|ng every|
|00000870| 74 68 69 6e 67 20 69 6e | 74 6f 20 6f 6e 65 20 73 |thing in|to one s|
|00000880| 65 67 6d 65 6e 74 20 65 | 6c 69 6d 69 6e 61 74 65 |egment e|liminate|
|00000890| 73 20 73 65 67 6d 65 6e | 74 20 6c 6f 61 64 65 72 |s segmen|t loader|
|000008a0| 20 65 72 72 6f 72 73 20 | 74 68 61 74 20 0d 09 77 | errors |that ..w|
|000008b0| 6f 75 6c 64 20 6f 63 63 | 75 72 20 69 66 20 74 68 |ould occ|ur if th|
|000008c0| 65 20 73 74 61 72 74 75 | 70 20 63 6f 64 65 20 74 |e startu|p code t|
|000008d0| 72 69 65 64 20 74 6f 20 | 63 61 6c 6c 20 47 65 74 |ried to |call Get|
|000008e0| 52 65 73 6f 75 72 63 65 | 20 62 65 66 6f 72 65 20 |Resource| before |
|000008f0| 0d 09 4f 70 65 6e 43 6f | 6d 70 6f 6e 65 6e 74 52 |..OpenCo|mponentR|
|00000900| 65 73 46 69 6c 65 20 69 | 73 20 63 61 6c 6c 65 64 |esFile i|s called|
|00000910| 2e 20 20 43 6f 6d 70 6f | 6e 65 6e 74 73 20 77 72 |.  Compo|nents wr|
|00000920| 69 74 74 65 6e 20 69 6e | 20 43 20 61 72 65 20 6d |itten in| C are m|
|00000930| 6f 76 65 61 62 6c 65 2c | 20 63 6f 6d 70 6f 6e 65 |oveable,| compone|
|00000940| 6e 74 73 20 0d 09 77 72 | 69 74 74 65 6e 20 69 6e |nts ..wr|itten in|
|00000950| 20 43 2b 2b 20 77 69 74 | 68 20 76 69 72 74 75 61 | C++ wit|h virtua|
|00000960| 6c 20 66 75 6e 63 74 69 | 6f 6e 73 20 70 72 6f 62 |l functi|ons prob|
|00000970| 61 62 6c 79 20 61 72 65 | 6e 27 74 2e 20 20 50 6c |ably are|n't.  Pl|
|00000980| 65 61 73 65 20 73 65 65 | 20 74 68 65 20 0d 09 43 |ease see| the ..C|
|00000990| 2b 2b 20 58 43 4d 44 20 | 65 78 61 6d 70 6c 65 20 |++ XCMD |example |
|000009a0| 6f 6e 20 74 68 65 20 43 | 44 20 66 6f 72 20 61 6e |on the C|D for an|
|000009b0| 20 65 78 61 6d 70 6c 65 | 20 6f 66 20 68 6f 77 20 | example| of how |
|000009c0| 74 6f 20 64 65 61 6c 20 | 43 2b 2b 20 63 6f 64 65 |to deal |C++ code|
|000009d0| 20 72 65 73 6f 75 72 63 | 65 73 2e 0d 0d 09 50 72 | resourc|es....Pr|
|000009e0| 6f 6a 65 63 74 20 73 65 | 74 74 69 6e 67 73 2c 20 |oject se|ttings, |
|000009f0| 70 6f 72 74 20 74 6f 20 | 50 50 43 20 61 6e 64 20 |port to |PPC and |
|00000a00| 63 6f 6d 6d 65 6e 74 73 | 20 62 79 0d 09 4d 61 72 |comments| by..Mar|
|00000a10| 6b 20 41 6e 64 65 72 73 | 6f 6e 0d 09 6d 65 74 72 |k Anders|on..metr|
|00000a20| 6f 77 65 72 6b 73 0d 09 | 31 32 2f 31 2f 39 34 0d |owerks..|12/1/94.|
|00000a30| 09 0d 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..******|********|
|00000a40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a80| 2a 2a 2a 2a 2a 2a 2f 0d | 0d 2f 2f 2d 2d 2d 2d 2d |******/.|.//-----|
|00000a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ad0| 2d 2d 0d 2f 2f 20 49 6e | 63 6c 75 64 65 73 0d 0d |--.// In|cludes..|
|00000ae0| 23 69 6e 63 6c 75 64 65 | 20 22 4d 61 74 68 43 6f |#include| "MathCo|
|00000af0| 6d 70 6f 6e 65 6e 74 2e | 68 22 0d 23 69 6e 63 6c |mponent.|h".#incl|
|00000b00| 75 64 65 20 22 4d 61 74 | 68 43 6f 6d 70 6f 6e 65 |ude "Mat|hCompone|
|00000b10| 6e 74 50 72 69 76 61 74 | 65 2e 68 22 0d 23 69 6e |ntPrivat|e.h".#in|
|00000b20| 63 6c 75 64 65 20 22 4d | 61 74 68 43 6f 6d 70 6f |clude "M|athCompo|
|00000b30| 6e 65 6e 74 43 6f 6d 6d | 6f 6e 2e 68 22 0d 23 69 |nentComm|on.h".#i|
|00000b40| 6e 63 6c 75 64 65 20 22 | 4d 6f 4d 61 74 68 43 6f |nclude "|MoMathCo|
|00000b50| 6d 70 6f 6e 65 6e 74 2e | 68 22 0d 23 69 6e 63 6c |mponent.|h".#incl|
|00000b60| 75 64 65 20 22 4d 6f 4d | 61 74 68 43 6f 6d 70 6f |ude "MoM|athCompo|
|00000b70| 6e 65 6e 74 50 72 69 76 | 61 74 65 2e 68 22 0d 23 |nentPriv|ate.h".#|
|00000b80| 69 6e 63 6c 75 64 65 20 | 3c 45 72 72 6f 72 73 2e |include |<Errors.|
|00000b90| 68 3e 0d 23 69 66 6e 64 | 65 66 20 70 6f 77 65 72 |h>.#ifnd|ef power|
|00000ba0| 63 0d 09 23 69 6e 63 6c | 75 64 65 20 3c 41 34 53 |c..#incl|ude <A4S|
|00000bb0| 74 75 66 66 2e 68 3e 0d | 23 65 6e 64 69 66 0d 0d |tuff.h>.|#endif..|
|00000bc0| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00000bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 2f 2f 20 50 72 6f |--------|-.// Pro|
|00000c10| 74 6f 74 79 70 65 20 28 | 63 61 6e 27 74 20 62 65 |totype (|can't be|
|00000c20| 20 69 6e 20 68 65 61 64 | 65 72 20 6f 72 20 74 68 | in head|er or th|
|00000c30| 65 72 65 20 69 73 20 61 | 20 63 6f 6e 66 6c 69 63 |ere is a| conflic|
|00000c40| 74 20 77 69 74 68 20 43 | 6f 6d 70 6f 6e 65 6e 74 |t with C|omponent|
|00000c50| 20 54 65 73 74 65 72 29 | 0d 23 69 66 6e 64 65 66 | Tester)|.#ifndef|
|00000c60| 20 44 45 42 55 47 5f 49 | 54 0d 09 70 61 73 63 61 | DEBUG_I|T..pasca|
|00000c70| 6c 09 43 6f 6d 70 6f 6e | 65 6e 74 52 65 73 75 6c |l.Compon|entResul|
|00000c80| 74 09 6d 61 69 6e 09 28 | 43 6f 6d 70 6f 6e 65 6e |t.main.(|Componen|
|00000c90| 74 50 61 72 61 6d 65 74 | 65 72 73 09 2a 70 61 72 |tParamet|ers.*par|
|00000ca0| 61 6d 73 2c 0d 09 09 09 | 09 09 09 09 09 20 48 61 |ams,....|..... Ha|
|00000cb0| 6e 64 6c 65 09 09 09 09 | 09 73 74 6f 72 61 67 65 |ndle....|.storage|
|00000cc0| 29 3b 0d 23 65 6e 64 69 | 66 0d 0d 2f 2f 2d 2d 2d |);.#endi|f..//---|
|00000cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d10| 2d 2d 2d 2d 0d 2f 2f 20 | 50 50 43 20 47 6c 6f 62 |----.// |PPC Glob|
|00000d20| 61 6c 73 0d 23 69 66 64 | 65 66 20 70 6f 77 65 72 |als.#ifd|ef power|
|00000d30| 63 20 0d 0d 09 49 4e 53 | 54 41 4e 54 49 41 54 45 |c ...INS|TANTIATE|
|00000d40| 5f 52 4f 55 54 49 4e 45 | 5f 44 45 53 43 52 49 50 |_ROUTINE|_DESCRIP|
|00000d50| 54 4f 52 28 4d 6f 4d 61 | 74 68 44 6f 41 64 64 29 |TOR(MoMa|thDoAdd)|
|00000d60| 3b 0d 09 49 4e 53 54 41 | 4e 54 49 41 54 45 5f 52 |;..INSTA|NTIATE_R|
|00000d70| 4f 55 54 49 4e 45 5f 44 | 45 53 43 52 49 50 54 4f |OUTINE_D|ESCRIPTO|
|00000d80| 52 28 4d 6f 4d 61 74 68 | 43 61 6e 44 6f 29 3b 0d |R(MoMath|CanDo);.|
|00000d90| 0d 23 69 66 6e 64 65 66 | 20 44 45 42 55 47 5f 49 |.#ifndef| DEBUG_I|
|00000da0| 54 20 09 2f 2f 20 54 68 | 69 73 20 66 69 6c 65 20 |T .// Th|is file |
|00000db0| 6d 75 73 74 20 6f 63 63 | 75 72 20 61 66 74 65 72 |must occ|ur after|
|00000dc0| 20 4d 61 74 68 43 6f 6d | 70 6f 6e 65 6e 74 2e 63 | MathCom|ponent.c|
|00000dd0| 20 69 6e 20 74 68 65 20 | 70 72 6f 6a 65 63 74 20 | in the |project |
|00000de0| 77 69 6e 64 6f 77 0d 09 | 09 09 09 09 2f 2f 20 6f |window..|....// o|
|00000df0| 74 68 65 72 77 69 73 65 | 20 74 68 65 73 65 20 67 |therwise| these g|
|00000e00| 6c 6f 62 61 6c 73 20 67 | 65 74 20 64 65 66 69 6e |lobals g|et defin|
|00000e10| 65 64 20 74 77 69 63 65 | 0d 09 49 4e 53 54 41 4e |ed twice|..INSTAN|
|00000e20| 54 49 41 54 45 5f 52 4f | 55 54 49 4e 45 5f 44 45 |TIATE_RO|UTINE_DE|
|00000e30| 53 43 52 49 50 54 4f 52 | 28 4d 61 74 68 4f 70 65 |SCRIPTOR|(MathOpe|
|00000e40| 6e 29 3b 0d 09 49 4e 53 | 54 41 4e 54 49 41 54 45 |n);..INS|TANTIATE|
|00000e50| 5f 52 4f 55 54 49 4e 45 | 5f 44 45 53 43 52 49 50 |_ROUTINE|_DESCRIP|
|00000e60| 54 4f 52 28 4d 61 74 68 | 43 6c 6f 73 65 29 3b 0d |TOR(Math|Close);.|
|00000e70| 09 49 4e 53 54 41 4e 54 | 49 41 54 45 5f 52 4f 55 |.INSTANT|IATE_ROU|
|00000e80| 54 49 4e 45 5f 44 45 53 | 43 52 49 50 54 4f 52 28 |TINE_DES|CRIPTOR(|
|00000e90| 4d 61 74 68 56 65 72 73 | 69 6f 6e 29 3b 0d 09 49 |MathVers|ion);..I|
|00000ea0| 4e 53 54 41 4e 54 49 41 | 54 45 5f 52 4f 55 54 49 |NSTANTIA|TE_ROUTI|
|00000eb0| 4e 45 5f 44 45 53 43 52 | 49 50 54 4f 52 28 4d 61 |NE_DESCR|IPTOR(Ma|
|00000ec0| 74 68 54 61 72 67 65 74 | 29 3b 0d 09 49 4e 53 54 |thTarget|);..INST|
|00000ed0| 41 4e 54 49 41 54 45 5f | 52 4f 55 54 49 4e 45 5f |ANTIATE_|ROUTINE_|
|00000ee0| 44 45 53 43 52 49 50 54 | 4f 52 28 4d 61 74 68 44 |DESCRIPT|OR(MathD|
|00000ef0| 6f 44 69 76 69 64 65 29 | 3b 0d 09 49 4e 53 54 41 |oDivide)|;..INSTA|
|00000f00| 4e 54 49 41 54 45 5f 52 | 4f 55 54 49 4e 45 5f 44 |NTIATE_R|OUTINE_D|
|00000f10| 45 53 43 52 49 50 54 4f | 52 28 4d 61 74 68 44 6f |ESCRIPTO|R(MathDo|
|00000f20| 4d 75 6c 74 69 70 6c 79 | 29 3b 0d 0d 09 52 6f 75 |Multiply|);...Rou|
|00000f30| 74 69 6e 65 44 65 73 63 | 72 69 70 74 6f 72 20 4d |tineDesc|riptor M|
|00000f40| 61 69 6e 52 44 20 3d 20 | 42 55 49 4c 44 5f 52 4f |ainRD = |BUILD_RO|
|00000f50| 55 54 49 4e 45 5f 44 45 | 53 43 52 49 50 54 4f 52 |UTINE_DE|SCRIPTOR|
|00000f60| 28 75 70 70 43 6f 6d 70 | 6f 6e 65 6e 74 52 6f 75 |(uppComp|onentRou|
|00000f70| 74 69 6e 65 50 72 6f 63 | 49 6e 66 6f 2c 20 6d 61 |tineProc|Info, ma|
|00000f80| 69 6e 29 3b 0d 09 50 72 | 6f 63 49 6e 66 6f 54 79 |in);..Pr|ocInfoTy|
|00000f90| 70 65 20 5f 5f 70 72 6f | 63 69 6e 66 6f 20 3d 20 |pe __pro|cinfo = |
|00000fa0| 75 70 70 43 6f 6d 70 6f | 6e 65 6e 74 52 6f 75 74 |uppCompo|nentRout|
|00000fb0| 69 6e 65 50 72 6f 63 49 | 6e 66 6f 3b 0d 23 65 6c |ineProcI|nfo;.#el|
|00000fc0| 73 65 0d 09 65 78 74 65 | 72 6e 20 52 6f 75 74 69 |se..exte|rn Routi|
|00000fd0| 6e 65 44 65 73 63 72 69 | 70 74 6f 72 20 4d 61 74 |neDescri|ptor Mat|
|00000fe0| 68 4f 70 65 6e 52 44 3b | 0d 09 65 78 74 65 72 6e |hOpenRD;|..extern|
|00000ff0| 20 52 6f 75 74 69 6e 65 | 44 65 73 63 72 69 70 74 | Routine|Descript|
|00001000| 6f 72 20 4d 61 74 68 43 | 6c 6f 73 65 52 44 3b 0d |or MathC|loseRD;.|
|00001010| 09 65 78 74 65 72 6e 20 | 52 6f 75 74 69 6e 65 44 |.extern |RoutineD|
|00001020| 65 73 63 72 69 70 74 6f | 72 20 4d 61 74 68 56 65 |escripto|r MathVe|
|00001030| 72 73 69 6f 6e 52 44 3b | 0d 09 65 78 74 65 72 6e |rsionRD;|..extern|
|00001040| 20 52 6f 75 74 69 6e 65 | 44 65 73 63 72 69 70 74 | Routine|Descript|
|00001050| 6f 72 20 4d 61 74 68 54 | 61 72 67 65 74 52 44 3b |or MathT|argetRD;|
|00001060| 0d 09 65 78 74 65 72 6e | 20 52 6f 75 74 69 6e 65 |..extern| Routine|
|00001070| 44 65 73 63 72 69 70 74 | 6f 72 20 4d 61 74 68 44 |Descript|or MathD|
|00001080| 6f 44 69 76 69 64 65 52 | 44 3b 0d 09 65 78 74 65 |oDivideR|D;..exte|
|00001090| 72 6e 20 52 6f 75 74 69 | 6e 65 44 65 73 63 72 69 |rn Routi|neDescri|
|000010a0| 70 74 6f 72 20 4d 61 74 | 68 44 6f 4d 75 6c 74 69 |ptor Mat|hDoMulti|
|000010b0| 70 6c 79 52 44 3b 0d 23 | 65 6e 64 69 66 0d 23 65 |plyRD;.#|endif.#e|
|000010c0| 6e 64 69 66 0d 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |ndif..//|--------|
|000010d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001110| 23 69 66 64 65 66 20 44 | 45 42 55 47 5f 49 54 0d |#ifdef D|EBUG_IT.|
|00001120| 0d 2f 2f 20 55 73 65 20 | 74 68 69 73 20 64 65 63 |.// Use |this dec|
|00001130| 6c 61 72 61 74 69 6f 6e | 20 77 68 65 6e 20 77 65 |laration| when we|
|00001140| 27 72 65 20 72 75 6e 6e | 69 6e 67 20 6c 69 6e 6b |'re runn|ing link|
|00001150| 65 64 20 28 66 6f 72 20 | 64 65 62 75 67 67 69 6e |ed (for |debuggin|
|00001160| 67 29 0d 70 61 73 63 61 | 6c 09 43 6f 6d 70 6f 6e |g).pasca|l.Compon|
|00001170| 65 6e 74 52 65 73 75 6c | 74 09 4d 6f 4d 61 74 68 |entResul|t.MoMath|
|00001180| 44 69 73 70 61 74 63 68 | 65 72 09 28 43 6f 6d 70 |Dispatch|er.(Comp|
|00001190| 6f 6e 65 6e 74 50 61 72 | 61 6d 65 74 65 72 73 09 |onentPar|ameters.|
|000011a0| 2a 70 61 72 61 6d 73 2c | 0d 09 09 09 09 09 09 09 |*params,|........|
|000011b0| 09 09 09 09 20 48 61 6e | 64 6c 65 09 09 09 09 09 |.... Han|dle.....|
|000011c0| 73 74 6f 72 61 67 65 29 | 0d 09 09 09 09 09 09 09 |storage)|........|
|000011d0| 09 09 09 09 20 0d 23 65 | 6c 73 65 0d 0d 2f 2f 20 |.... .#e|lse..// |
|000011e0| 55 73 65 20 74 68 69 73 | 20 64 65 63 6c 61 72 61 |Use this| declara|
|000011f0| 74 69 6f 6e 20 77 68 65 | 6e 20 77 65 27 72 65 20 |tion whe|n we're |
|00001200| 61 20 73 74 61 6e 64 61 | 6c 6f 6e 65 20 63 6f 6d |a standa|lone com|
|00001210| 70 6f 6e 65 6e 74 0d 70 | 61 73 63 61 6c 09 43 6f |ponent.p|ascal.Co|
|00001220| 6d 70 6f 6e 65 6e 74 52 | 65 73 75 6c 74 09 6d 61 |mponentR|esult.ma|
|00001230| 69 6e 09 28 43 6f 6d 70 | 6f 6e 65 6e 74 50 61 72 |in.(Comp|onentPar|
|00001240| 61 6d 65 74 65 72 73 09 | 2a 70 61 72 61 6d 73 2c |ameters.|*params,|
|00001250| 0d 09 09 09 09 09 09 09 | 09 20 48 61 6e 64 6c 65 |........|. Handle|
|00001260| 09 09 09 09 09 73 74 6f | 72 61 67 65 29 0d 0d 23 |.....sto|rage)..#|
|00001270| 65 6e 64 69 66 20 44 45 | 42 55 47 5f 49 54 0d 0d |endif DE|BUG_IT..|
|00001280| 7b 0d 09 2f 2f 20 54 68 | 69 73 20 72 6f 75 74 69 |{..// Th|is routi|
|00001290| 6e 65 20 69 73 20 74 68 | 65 20 6d 61 69 6e 20 64 |ne is th|e main d|
|000012a0| 69 73 70 61 74 63 68 65 | 72 20 66 6f 72 20 74 68 |ispatche|r for th|
|000012b0| 65 20 4d 6f 4d 61 74 68 | 20 63 6f 6d 70 6f 6e 65 |e MoMath| compone|
|000012c0| 6e 74 0d 09 0d 09 43 6f | 6d 70 6f 6e 65 6e 74 52 |nt....Co|mponentR|
|000012d0| 65 73 75 6c 74 09 09 09 | 72 65 73 75 6c 74 20 3d |esult...|result =|
|000012e0| 20 6e 6f 45 72 72 3b 0d | 0d 23 69 66 20 21 64 65 | noErr;.|.#if !de|
|000012f0| 66 69 6e 65 64 28 70 6f | 77 65 72 63 29 20 26 26 |fined(po|werc) &&|
|00001300| 20 21 64 65 66 69 6e 65 | 64 28 44 45 42 55 47 5f | !define|d(DEBUG_|
|00001310| 49 54 29 0d 09 6c 6f 6e | 67 20 09 09 09 09 09 6f |IT)..lon|g .....o|
|00001320| 6c 64 41 34 3b 0d 09 0d | 09 6f 6c 64 41 34 20 3d |ldA4;...|.oldA4 =|
|00001330| 20 53 65 74 43 75 72 72 | 65 6e 74 41 34 28 29 3b | SetCurr|entA4();|
|00001340| 0d 23 65 6e 64 69 66 0d | 0d 0d 09 2f 2f 20 44 69 |.#endif.|...// Di|
|00001350| 64 20 77 65 20 67 65 74 | 20 61 20 43 6f 6d 70 6f |d we get| a Compo|
|00001360| 6e 65 6e 74 20 4d 61 6e | 61 67 65 72 20 72 65 71 |nent Man|ager req|
|00001370| 75 65 73 74 20 63 6f 64 | 65 20 28 3c 20 30 29 3f |uest cod|e (< 0)?|
|00001380| 0d 09 69 66 20 28 70 61 | 72 61 6d 73 2d 3e 77 68 |..if (pa|rams->wh|
|00001390| 61 74 20 3c 20 30 29 0d | 09 7b 0d 09 09 73 77 69 |at < 0).|.{...swi|
|000013a0| 74 63 68 20 28 70 61 72 | 61 6d 73 2d 3e 77 68 61 |tch (par|ams->wha|
|000013b0| 74 29 0d 09 09 7b 0d 09 | 09 09 63 61 73 65 20 6b |t)...{..|..case k|
|000013c0| 43 6f 6d 70 6f 6e 65 6e | 74 4f 70 65 6e 53 65 6c |Componen|tOpenSel|
|000013d0| 65 63 74 3a 09 09 2f 2f | 20 4f 70 65 6e 20 72 65 |ect:..//| Open re|
|000013e0| 71 75 65 73 74 0d 09 09 | 09 7b 0d 09 09 09 09 72 |quest...|.{.....r|
|000013f0| 65 73 75 6c 74 20 3d 20 | 43 61 6c 6c 43 6f 6d 70 |esult = |CallComp|
|00001400| 6f 6e 65 6e 74 46 75 6e | 63 74 69 6f 6e 55 6e 69 |onentFun|ctionUni|
|00001410| 76 28 70 61 72 61 6d 73 | 2c 20 4d 61 74 68 4f 70 |v(params|, MathOp|
|00001420| 65 6e 29 3b 0d 09 09 09 | 09 62 72 65 61 6b 3b 0d |en);....|.break;.|
|00001430| 09 09 09 7d 09 0d 09 0d | 09 09 09 63 61 73 65 20 |...}....|...case |
|00001440| 6b 43 6f 6d 70 6f 6e 65 | 6e 74 43 6c 6f 73 65 53 |kCompone|ntCloseS|
|00001450| 65 6c 65 63 74 3a 09 09 | 2f 2f 20 43 6c 6f 73 65 |elect:..|// Close|
|00001460| 20 72 65 71 75 65 73 74 | 0d 09 09 09 7b 0d 09 09 | request|....{...|
|00001470| 09 09 2f 2f 69 66 20 6f | 70 65 6e 20 66 61 69 6c |..//if o|pen fail|
|00001480| 73 2c 20 63 6c 6f 73 65 | 20 67 65 74 73 20 63 61 |s, close| gets ca|
|00001490| 6c 6c 65 64 20 73 6f 20 | 0d 09 09 09 09 2f 2f 67 |lled so |.....//g|
|000014a0| 6c 6f 62 61 6c 73 20 61 | 72 65 6e 27 74 20 61 6c |lobals a|ren't al|
|000014b0| 6c 6f 63 61 74 65 64 0d | 09 09 09 09 69 66 20 28 |located.|....if (|
|000014c0| 21 73 74 6f 72 61 67 65 | 29 0d 09 09 09 09 09 72 |!storage|)......r|
|000014d0| 65 74 75 72 6e 20 72 65 | 73 75 6c 74 3b 0d 09 09 |eturn re|sult;...|
|000014e0| 09 09 72 65 73 75 6c 74 | 20 3d 20 43 61 6c 6c 43 |..result| = CallC|
|000014f0| 6f 6d 70 6f 6e 65 6e 74 | 46 75 6e 63 74 69 6f 6e |omponent|Function|
|00001500| 57 69 74 68 53 74 6f 72 | 61 67 65 55 6e 69 76 28 |WithStor|ageUniv(|
|00001510| 73 74 6f 72 61 67 65 2c | 20 70 61 72 61 6d 73 2c |storage,| params,|
|00001520| 20 4d 61 74 68 43 6c 6f | 73 65 29 3b 0d 09 09 09 | MathClo|se);....|
|00001530| 09 62 72 65 61 6b 3b 09 | 0d 09 09 09 7d 09 09 0d |.break;.|....}...|
|00001540| 09 09 09 63 61 73 65 20 | 6b 43 6f 6d 70 6f 6e 65 |...case |kCompone|
|00001550| 6e 74 43 61 6e 44 6f 53 | 65 6c 65 63 74 3a 09 09 |ntCanDoS|elect:..|
|00001560| 2f 2f 20 43 61 6e 20 44 | 6f 20 72 65 71 75 65 73 |// Can D|o reques|
|00001570| 74 0d 09 09 09 7b 0d 09 | 09 09 09 72 65 73 75 6c |t....{..|...resul|
|00001580| 74 20 3d 20 43 61 6c 6c | 43 6f 6d 70 6f 6e 65 6e |t = Call|Componen|
|00001590| 74 46 75 6e 63 74 69 6f | 6e 55 6e 69 76 28 70 61 |tFunctio|nUniv(pa|
|000015a0| 72 61 6d 73 2c 20 4d 6f | 4d 61 74 68 43 61 6e 44 |rams, Mo|MathCanD|
|000015b0| 6f 29 3b 0d 09 09 09 09 | 62 72 65 61 6b 3b 09 0d |o);.....|break;..|
|000015c0| 09 09 09 7d 0d 09 09 09 | 63 61 73 65 20 6b 43 6f |...}....|case kCo|
|000015d0| 6d 70 6f 6e 65 6e 74 56 | 65 72 73 69 6f 6e 53 65 |mponentV|ersionSe|
|000015e0| 6c 65 63 74 3a 09 2f 2f | 20 56 65 72 73 69 6f 6e |lect:.//| Version|
|000015f0| 20 72 65 71 75 65 73 74 | 0d 09 09 09 7b 0d 09 09 | request|....{...|
|00001600| 09 09 72 65 73 75 6c 74 | 20 3d 20 43 61 6c 6c 43 |..result| = CallC|
|00001610| 6f 6d 70 6f 6e 65 6e 74 | 46 75 6e 63 74 69 6f 6e |omponent|Function|
|00001620| 55 6e 69 76 28 70 61 72 | 61 6d 73 2c 20 4d 61 74 |Univ(par|ams, Mat|
|00001630| 68 56 65 72 73 69 6f 6e | 29 3b 0d 09 09 09 09 62 |hVersion|);.....b|
|00001640| 72 65 61 6b 3b 09 0d 09 | 09 09 7d 09 0d 09 09 09 |reak;...|..}.....|
|00001650| 63 61 73 65 20 6b 43 6f | 6d 70 6f 6e 65 6e 74 54 |case kCo|mponentT|
|00001660| 61 72 67 65 74 53 65 6c | 65 63 74 3a 09 2f 2f 20 |argetSel|ect:.// |
|00001670| 54 61 72 67 65 74 20 72 | 65 71 75 65 73 74 0d 09 |Target r|equest..|
|00001680| 09 09 7b 0d 09 09 09 09 | 72 65 73 75 6c 74 20 3d |..{.....|result =|
|00001690| 20 43 61 6c 6c 43 6f 6d | 70 6f 6e 65 6e 74 46 75 | CallCom|ponentFu|
|000016a0| 6e 63 74 69 6f 6e 57 69 | 74 68 53 74 6f 72 61 67 |nctionWi|thStorag|
|000016b0| 65 55 6e 69 76 28 73 74 | 6f 72 61 67 65 2c 20 70 |eUniv(st|orage, p|
|000016c0| 61 72 61 6d 73 2c 20 4d | 61 74 68 54 61 72 67 65 |arams, M|athTarge|
|000016d0| 74 29 3b 0d 09 09 09 09 | 62 72 65 61 6b 3b 09 0d |t);.....|break;..|
|000016e0| 09 09 09 7d 0d 09 09 09 | 63 61 73 65 20 6b 43 6f |...}....|case kCo|
|000016f0| 6d 70 6f 6e 65 6e 74 52 | 65 67 69 73 74 65 72 53 |mponentR|egisterS|
|00001700| 65 6c 65 63 74 3a 09 2f | 2f 20 52 65 67 69 73 74 |elect:./|/ Regist|
|00001710| 65 72 20 72 65 71 75 65 | 73 74 20 6e 6f 74 20 73 |er reque|st not s|
|00001720| 75 70 70 6f 72 74 65 64 | 0d 09 09 09 64 65 66 61 |upported|....defa|
|00001730| 75 6c 74 3a 09 09 09 09 | 09 09 2f 2f 20 55 6e 6b |ult:....|..// Unk|
|00001740| 6e 6f 77 6e 20 72 65 71 | 75 65 73 74 0d 09 09 09 |nown req|uest....|
|00001750| 7b 0d 09 09 09 09 72 65 | 73 75 6c 74 20 3d 20 70 |{.....re|sult = p|
|00001760| 61 72 61 6d 45 72 72 3b | 0d 09 09 09 09 62 72 65 |aramErr;|.....bre|
|00001770| 61 6b 3b 0d 09 09 09 7d | 0d 09 09 7d 0d 09 09 09 |ak;....}|...}....|
|00001780| 0d 09 09 0d 09 7d 0d 09 | 65 6c 73 65 09 2f 2f 20 |.....}..|else.// |
|00001790| 57 61 73 20 69 74 20 6f | 6e 65 20 6f 66 20 6f 75 |Was it o|ne of ou|
|000017a0| 72 20 72 65 71 75 65 73 | 74 20 63 6f 64 65 73 3f |r reques|t codes?|
|000017b0| 0d 09 7b 0d 09 09 73 77 | 69 74 63 68 20 28 70 61 |..{...sw|itch (pa|
|000017c0| 72 61 6d 73 2d 3e 77 68 | 61 74 29 0d 09 09 7b 0d |rams->wh|at)...{.|
|000017d0| 09 09 09 2f 2f 20 6d 61 | 74 68 20 63 6f 6d 70 6f |...// ma|th compo|
|000017e0| 6e 65 6e 74 20 73 65 6c | 65 63 74 6f 72 73 0d 09 |nent sel|ectors..|
|000017f0| 09 09 63 61 73 65 20 6b | 44 6f 44 69 76 69 64 65 |..case k|DoDivide|
|00001800| 53 65 6c 65 63 74 3a 09 | 09 09 2f 2f 20 44 69 76 |Select:.|..// Div|
|00001810| 69 64 65 20 72 65 71 75 | 65 73 74 0d 09 09 09 7b |ide requ|est....{|
|00001820| 0d 09 09 09 09 72 65 73 | 75 6c 74 20 3d 20 43 61 |.....res|ult = Ca|
|00001830| 6c 6c 43 6f 6d 70 6f 6e | 65 6e 74 46 75 6e 63 74 |llCompon|entFunct|
|00001840| 69 6f 6e 55 6e 69 76 28 | 70 61 72 61 6d 73 2c 20 |ionUniv(|params, |
|00001850| 4d 61 74 68 44 6f 44 69 | 76 69 64 65 29 3b 0d 09 |MathDoDi|vide);..|
|00001860| 09 09 09 62 72 65 61 6b | 3b 09 0d 09 09 09 7d 09 |...break|;.....}.|
|00001870| 0d 09 09 09 63 61 73 65 | 20 6b 44 6f 4d 75 6c 74 |....case| kDoMult|
|00001880| 69 70 6c 79 53 65 6c 65 | 63 74 3a 09 09 09 2f 2f |iplySele|ct:...//|
|00001890| 20 4d 75 6c 74 69 70 6c | 79 20 72 65 71 75 65 73 | Multipl|y reques|
|000018a0| 74 0d 09 09 09 7b 0d 09 | 09 09 09 72 65 73 75 6c |t....{..|...resul|
|000018b0| 74 20 3d 20 43 61 6c 6c | 43 6f 6d 70 6f 6e 65 6e |t = Call|Componen|
|000018c0| 74 46 75 6e 63 74 69 6f | 6e 55 6e 69 76 28 70 61 |tFunctio|nUniv(pa|
|000018d0| 72 61 6d 73 2c 20 4d 61 | 74 68 44 6f 4d 75 6c 74 |rams, Ma|thDoMult|
|000018e0| 69 70 6c 79 29 3b 0d 09 | 09 09 09 62 72 65 61 6b |iply);..|...break|
|000018f0| 3b 09 0d 09 09 09 7d 0d | 09 09 09 63 61 73 65 20 |;.....}.|...case |
|00001900| 6b 44 6f 41 64 64 53 65 | 6c 65 63 74 3a 09 09 09 |kDoAddSe|lect:...|
|00001910| 09 2f 2f 20 41 64 64 20 | 72 65 71 75 65 73 74 0d |.// Add |request.|
|00001920| 09 09 09 7b 0d 09 09 09 | 09 72 65 73 75 6c 74 20 |...{....|.result |
|00001930| 3d 20 43 61 6c 6c 43 6f | 6d 70 6f 6e 65 6e 74 46 |= CallCo|mponentF|
|00001940| 75 6e 63 74 69 6f 6e 55 | 6e 69 76 28 70 61 72 61 |unctionU|niv(para|
|00001950| 6d 73 2c 20 4d 6f 4d 61 | 74 68 44 6f 41 64 64 29 |ms, MoMa|thDoAdd)|
|00001960| 3b 0d 09 09 09 09 62 72 | 65 61 6b 3b 09 0d 09 09 |;.....br|eak;....|
|00001970| 09 7d 0d 09 09 09 64 65 | 66 61 75 6c 74 3a 09 09 |.}....de|fault:..|
|00001980| 09 09 09 09 2f 2f 20 55 | 6e 6b 6e 6f 77 6e 20 72 |....// U|nknown r|
|00001990| 65 71 75 65 73 74 0d 09 | 09 09 7b 0d 09 09 09 09 |equest..|..{.....|
|000019a0| 72 65 73 75 6c 74 20 3d | 20 70 61 72 61 6d 45 72 |result =| paramEr|
|000019b0| 72 3b 0d 09 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |r;.....b|reak;...|
|000019c0| 09 7d 0d 0d 09 09 7d 0d | 09 7d 0d 09 0d 0d 23 69 |.}....}.|.}....#i|
|000019d0| 66 20 21 64 65 66 69 6e | 65 64 28 70 6f 77 65 72 |f !defin|ed(power|
|000019e0| 63 29 20 26 26 20 21 64 | 65 66 69 6e 65 64 28 44 |c) && !d|efined(D|
|000019f0| 45 42 55 47 5f 49 54 29 | 0d 09 53 65 74 41 34 28 |EBUG_IT)|..SetA4(|
|00001a00| 6f 6c 64 41 34 29 3b 0d | 23 65 6e 64 69 66 0d 09 |oldA4);.|#endif..|
|00001a10| 72 65 74 75 72 6e 20 28 | 72 65 73 75 6c 74 29 3b |return (|result);|
|00001a20| 0d 7d 0d 09 09 09 09 09 | 09 09 09 09 09 09 20 0d |.}......|...... .|
|00001a30| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00001a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0d 70 61 73 63 61 |--------|-..pasca|
|00001a80| 6c 09 43 6f 6d 70 6f 6e | 65 6e 74 52 65 73 75 6c |l.Compon|entResul|
|00001a90| 74 09 4d 6f 4d 61 74 68 | 43 61 6e 44 6f 09 28 73 |t.MoMath|CanDo.(s|
|00001aa0| 68 6f 72 74 09 73 65 6c | 65 63 74 6f 72 29 0d 7b |hort.sel|ector).{|
|00001ab0| 0d 09 73 77 69 74 63 68 | 20 28 73 65 6c 65 63 74 |..switch| (select|
|00001ac0| 6f 72 29 0d 09 7b 0d 09 | 09 2f 2f 20 43 6f 6d 70 |or)..{..|.// Comp|
|00001ad0| 6f 6e 65 6e 74 20 4d 61 | 6e 61 67 65 72 20 72 65 |onent Ma|nager re|
|00001ae0| 71 75 65 73 74 20 63 6f | 64 65 73 0d 09 09 63 61 |quest co|des...ca|
|00001af0| 73 65 20 6b 43 6f 6d 70 | 6f 6e 65 6e 74 4f 70 65 |se kComp|onentOpe|
|00001b00| 6e 53 65 6c 65 63 74 3a | 0d 09 09 63 61 73 65 20 |nSelect:|...case |
|00001b10| 6b 43 6f 6d 70 6f 6e 65 | 6e 74 43 6c 6f 73 65 53 |kCompone|ntCloseS|
|00001b20| 65 6c 65 63 74 3a 0d 09 | 09 63 61 73 65 20 6b 43 |elect:..|.case kC|
|00001b30| 6f 6d 70 6f 6e 65 6e 74 | 43 61 6e 44 6f 53 65 6c |omponent|CanDoSel|
|00001b40| 65 63 74 3a 0d 09 09 63 | 61 73 65 20 6b 43 6f 6d |ect:...c|ase kCom|
|00001b50| 70 6f 6e 65 6e 74 56 65 | 72 73 69 6f 6e 53 65 6c |ponentVe|rsionSel|
|00001b60| 65 63 74 3a 0d 09 09 63 | 61 73 65 20 6b 43 6f 6d |ect:...c|ase kCom|
|00001b70| 70 6f 6e 65 6e 74 54 61 | 72 67 65 74 53 65 6c 65 |ponentTa|rgetSele|
|00001b80| 63 74 3a 0d 09 09 0d 09 | 09 2f 2f 20 4d 61 74 68 |ct:.....|.// Math|
|00001b90| 20 63 6f 6d 70 6f 6e 65 | 6e 74 20 72 65 71 75 65 | compone|nt reque|
|00001ba0| 73 74 20 63 6f 64 65 73 | 0d 09 09 63 61 73 65 20 |st codes|...case |
|00001bb0| 6b 44 6f 44 69 76 69 64 | 65 53 65 6c 65 63 74 3a |kDoDivid|eSelect:|
|00001bc0| 0d 09 09 63 61 73 65 20 | 6b 44 6f 4d 75 6c 74 69 |...case |kDoMulti|
|00001bd0| 70 6c 79 53 65 6c 65 63 | 74 3a 0d 09 0d 09 09 2f |plySelec|t:...../|
|00001be0| 2f 20 4d 6f 4d 61 74 68 | 20 63 6f 6d 70 6f 6e 65 |/ MoMath| compone|
|00001bf0| 6e 74 20 72 65 71 75 65 | 73 74 20 63 6f 64 65 73 |nt reque|st codes|
|00001c00| 0d 09 09 63 61 73 65 20 | 6b 44 6f 41 64 64 53 65 |...case |kDoAddSe|
|00001c10| 6c 65 63 74 3a 0d 09 09 | 7b 0d 09 09 09 72 65 74 |lect:...|{....ret|
|00001c20| 75 72 6e 20 28 74 72 75 | 65 29 3b 0d 09 09 7d 0d |urn (tru|e);...}.|
|00001c30| 09 09 63 61 73 65 20 6b | 43 6f 6d 70 6f 6e 65 6e |..case k|Componen|
|00001c40| 74 52 65 67 69 73 74 65 | 72 53 65 6c 65 63 74 3a |tRegiste|rSelect:|
|00001c50| 09 2f 2f 20 52 65 67 69 | 73 74 65 72 20 72 65 71 |.// Regi|ster req|
|00001c60| 75 65 73 74 20 6e 6f 74 | 20 73 75 70 70 6f 72 74 |uest not| support|
|00001c70| 65 64 0d 09 09 64 65 66 | 61 75 6c 74 3a 09 09 09 |ed...def|ault:...|
|00001c80| 09 09 09 2f 2f 20 4e 6f | 74 20 61 20 72 65 71 75 |...// No|t a requ|
|00001c90| 65 73 74 20 63 6f 64 65 | 20 77 65 20 72 65 63 6f |est code| we reco|
|00001ca0| 67 6e 69 7a 65 0d 09 09 | 7b 0d 09 09 09 72 65 74 |gnize...|{....ret|
|00001cb0| 75 72 6e 20 28 66 61 6c | 73 65 29 3b 0d 09 09 7d |urn (fal|se);...}|
|00001cc0| 0d 09 7d 0d 7d 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |..}.}../|/-------|
|00001cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001d00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001d10| 0d 0d 70 61 73 63 61 6c | 09 43 6f 6d 70 6f 6e 65 |..pascal|.Compone|
|00001d20| 6e 74 52 65 73 75 6c 74 | 09 4d 6f 4d 61 74 68 44 |ntResult|.MoMathD|
|00001d30| 6f 41 64 64 09 28 73 68 | 6f 72 74 09 66 69 72 73 |oAdd.(sh|ort.firs|
|00001d40| 74 4e 75 6d 2c 0d 09 09 | 09 09 09 09 09 09 09 09 |tNum,...|........|
|00001d50| 20 73 68 6f 72 74 09 73 | 65 63 6f 6e 64 4e 75 6d | short.s|econdNum|
|00001d60| 2c 0d 09 09 09 09 09 09 | 09 09 09 09 20 73 68 6f |,.......|.... sho|
|00001d70| 72 74 09 2a 61 64 64 69 | 74 69 6f 6e 52 65 73 75 |rt.*addi|tionResu|
|00001d80| 6c 74 29 0d 7b 0d 09 43 | 6f 6d 70 6f 6e 65 6e 74 |lt).{..C|omponent|
|00001d90| 52 65 73 75 6c 74 09 72 | 65 73 75 6c 74 20 3d 20 |Result.r|esult = |
|00001da0| 6e 6f 45 72 72 3b 0d 09 | 0d 09 2a 61 64 64 69 74 |noErr;..|..*addit|
|00001db0| 69 6f 6e 52 65 73 75 6c | 74 20 3d 20 66 69 72 73 |ionResul|t = firs|
|00001dc0| 74 4e 75 6d 20 2b 20 73 | 65 63 6f 6e 64 4e 75 6d |tNum + s|econdNum|
|00001dd0| 3b 0d 0d 09 72 65 74 75 | 72 6e 20 28 72 65 73 75 |;...retu|rn (resu|
|00001de0| 6c 74 29 3b 0d 7d 0d 0d | 00 00 00 00 00 00 00 00 |lt);.}..|........|
|00001df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e00| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00001e10| 5a 4d 50 02 06 8a 2e 2e | 5b 15 4e 5e 4e 75 4e 56 |ZMP.....|[.N^NuNV|
|00001e20| 00 00 48 e7 16 01 08 3e | 2e 00 0e 28 6e 00 08 0c |..H....>|...(n...|
|00001e30| 11 4d 6f 4d 61 74 68 43 | 6f 6d 70 6f 6e 65 6e 74 |.MoMathC|omponent|
|00001e40| 2e 63 02 00 00 00 54 45 | 58 54 4d 4d 43 43 01 00 |.c....TE|XTMMCC..|
|00001e50| 00 00 54 45 58 54 4d 4d | 43 43 01 00 00 00 01 80 |..TEXTMM|CC......|
|00001e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e70| 00 00 ab 02 cc 42 00 00 | 1d 68 00 00 01 9a 1b 67 |.....B..|.h.....g|
|00001e80| 18 60 68 7f 12 2e 28 00 | ca 01 60 6e 7f 01 22 48 |.`h...(.|..`n.."H|
|00001e90| 2b 03 9e a9 00 ce 60 60 | 60 7f 58 03 22 68 01 48 |+.....``|`.X."h.H|
|00001ea0| 4e 91 f1 67 01 60 4e 60 | 7f 58 06 22 68 01 6c 4e |N..g.`N`|.X."h.lN|
|00001eb0| 91 7e 00 1e 00 4a 87 67 | 01 60 38 7f 03 4a a8 00 |.~...J.g|.`8..J..|
|00001ec0| a0 67 12 86 01 2c ed 86 | 01 00 97 50 01 09 da f1 |.g...,..|...P....|
|00001ed0| 6d 01 60 1e 17 48 c6 2f | 06 2f 0c 4e ad 2d 9a 2e |m.`..H./|./.N.-..|
|00001ee0| 00 50 8f 01 60 0e 2c b9 | 73 01 10 c0 72 25 26 02 |.P..`.,.|s...r%&.|
|00001ef0| 0b ea 66 28 28 01 30 aa | 9d 67 01 66 18 7f 01 08 |..f((.0.|.g.f....|
|00001f00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00001f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f20| 00 00 00 00 00 00 00 03 | 00 04 00 58 00 04 01 7d |........|...X...}|
|00001f30| 02 63 00 58 00 04 01 7d | 02 63 ab 30 19 89 00 00 |.c.X...}|.c.0....|
|00001f40| 11 ae 00 00 11 b2 00 00 | 00 00 01 00 00 00 00 04 |........|........|
|00001f50| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|00001f60| 00 00 00 46 00 71 01 b4 | 2d 8a 00 00 00 1c 00 46 |...F.q..|-......F|
|00001f70| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00001f80| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00001f90| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00001fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+